|
NX Programmierung : VB Bezugskoordinatensystem verschieben
Overcast am 04.12.2008 um 15:16 Uhr (0)
Keine Ahnung, ob es hilft, aber mir sind 2 Sachen aufgefallen: Zitat:Dim LayNum1 As String...WP.Layers.MoveObjects(LayNum1, objArray)1)Die Doku beschreibt den 1. Parameter für MoveObjects() als Integer, nicht als String!Hier hilft die VB Funktion Val():Dim LayNum2 = Val(LayNum1)2)In der NX6 Doku ist die Funktion MoveObjects() bereits obsolete.In der NX5 Doku heisst es ebenfalls bereits "Deprecated in NX5"Würde daher eher MoveDisplayableObjects() verwenden.
| | In das Form NX Programmierung wechseln |
|
NX Programmierung : Flächenkörper auswählen
Overcast am 04.12.2008 um 14:32 Uhr (0)
Warum setzt Du den Sheet Body nicht direkt in der Selektionsmaske...?!Code:Option Strict OffImports SystemImports NXOpenImports NXOpen.UIImports NXOpen.UFModule report_selected_sheet_bodySub MainDim theSession As Session = Session.GetSession()Dim lw As ListingWindow = theSession.ListingWindowDim body As Body = nothinglw.Open()While select_a_sheet_body(body) = Selection.Response.Ok lw.WriteLine("Selected Sheet Body: " & body.ToString())End WhileEnd SubFunction select_a_sheet_body(ByRef obj As Body) Dim ui ...
| | In das Form NX Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |